home *** CD-ROM | disk | FTP | other *** search
/ TOS Silver 2000 / TOS Silver 2000.iso / programm / MM2_DEV / S / GEM / FASTGEM0.D < prev    next >
Encoding:
Modula Definition  |  1990-10-09  |  1.3 KB  |  41 lines
  1. DEFINITION MODULE FastGEM0;
  2.  
  3.  
  4. (*  System              : Megamax Modula-2 (MOS 2.0)
  5.  *  Author & Copyright  : Manuel Chakravarty
  6.  *  Vertrieb            : Application Systems Heidelberg
  7.  *  Version             : 1.0           V#0004
  8.  *)
  9.  
  10. (*  Dies Modul stellt eine schnelle Kopierfunktion für beliebige Bildschirm-
  11.  *  bereiche zur Verfügung.
  12.  *)
  13.  
  14.  
  15. FROM GrafBase   IMPORT Rectangle, BitOperation, PtrMemFormDef;
  16.  
  17. FROM GEMEnv     IMPORT DeviceHandle;
  18.  
  19.  
  20. PROCEDURE CopyOpaque (dev        : DeviceHandle;
  21.                       sourceMem,
  22.                       destMem    : PtrMemFormDef;
  23.                       sourceFrame,
  24.                       destFrame  : Rectangle;
  25.                       mode       : BitOperation);
  26.                       
  27.         (*  Diese Routine entspricht in ihrer Funktion der Prozedur
  28.          *  'VDIRasters.CopyOpaque'. Allerdings zeigt sie bei nicht
  29.          *  vorhandenem Blitter ein besseres Laufzeitverhalten.
  30.          *  Ist ein Blitter vorhanden, so wird dies erkannt und die
  31.          *  VDI-Routine aufgerufen.
  32.          *
  33.          *  Hinweis: Die aktuelle Implementation übernimmt das Kopieren
  34.          *           nur in einigen Sonderfällen und gibt die übrigen
  35.          *           Fälle an das VDI weiter. Dadurch treten aber
  36.          *           keine Nachteile auf.
  37.          *)
  38.  
  39.  
  40. END FastGEM0.
  41.